home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 32 / Mac Magazin and MacEasy Magazine CD - Issue 32.iso / Grafik & Text / OzTeX3.0 / TeX-inputs / LaTeX / tools / ftnright.sty (.txt) < prev    next >
LaTeX Document  |  1997-03-07  |  6KB  |  179 lines
  1. %% This is file `ftnright.sty',
  2. %% generated with the docstrip utility.
  3. %% The original source files were:
  4. %% ftnright.dtx  (with options: `package')
  5. %% IMPORTANT NOTICE:
  6. %% This file is a generated file from the sources of the `tools' bundle
  7. %% in the LaTeX2e distribution.
  8. %% For the copyright notice see the source file(s).
  9. %% You are not allowed to modify this file.
  10. %% You are allowed to distribute this file if and only if
  11. %% it is distributed with the corresponding source files in
  12. %% the `tools' bundle.
  13. %% For the copying and distribution conditions of the source files,
  14. %% see the file readme.txt distributed with the tools bundle.
  15. %% Package `ftnright' to use with LaTeX 2e
  16. %% Copyright (C) 1989-1996 Frank Mittelbach, all rights reserved.
  17. \NeedsTeXFormat{LaTeX2e}[1995/06/01]
  18. \ProvidesPackage{ftnright}
  19.          [1996/01/01 v1.1c footnote layout package (FMi)]
  20. %% \CheckSum{423}
  21. %% \CharacterTable
  22. %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
  23. %%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
  24. %%   Digits        \0\1\2\3\4\5\6\7\8\9
  25. %%   Exclamation   \!     Double quote  \"     Hash (number) \#
  26. %%   Dollar        \$     Percent       \%     Ampersand     \&
  27. %%   Acute accent  \'     Left paren    \(     Right paren   \)
  28. %%   Asterisk      \*     Plus          \+     Comma         \,
  29. %%   Minus         \-     Point         \.     Solidus       \/
  30. %%   Colon         \:     Semicolon     \;     Less than     \<
  31. %%   Equals        \=     Greater than  \>     Question mark \?
  32. %%   Commercial at \@     Left bracket  \[     Backslash     \\
  33. %%   Right bracket \]     Circumflex    \^     Underscore    \_
  34. %%   Grave accent  \`     Left brace    \{     Vertical bar  \|
  35. %%   Right brace   \}     Tilde         \~}
  36. \def\preparefootins{%
  37.   \global\rcol@footinsskip\skip\footins
  38.   \global\skip\footins\z@
  39.   \global\count\footins\z@
  40.   \global\dimen\footins\textheight}
  41. \newskip\rcol@footinsskip
  42. \def\@outputdblcol{\if@firstcolumn
  43.   \global\@firstcolumnfalse
  44.   \global\setbox\@leftcolumn\box\@outputbox
  45.   \global\count\footins\@m
  46.   \global\skip\footins\rcol@footinsskip
  47.  \else \preparefootins
  48.   \global\@firstcolumntrue
  49.   \setbox\@outputbox\vbox{\hbox to\textwidth
  50.     {\hbox to\columnwidth
  51.                   {\box\@leftcolumn\hss}%
  52.      \hfil\vrule\@width\columnseprule\hfil
  53.      \hbox to\columnwidth
  54.                   {\box\@outputbox\hss}}}%
  55.   \@combinedblfloats\@outputpage
  56.   \begingroup
  57.    \@dblfloatplacement\@startdblcolumn
  58.    \@whilesw\if@fcolmade\fi
  59.     {\@outputpage\@startdblcolumn}%
  60.   \endgroup
  61.  \fi}
  62. \def\@startcolumn{%
  63.  \ifx\@deferlist\@empty
  64.    \global\@fcolmadefalse
  65.    \global\@colroom\@colht
  66.  \else
  67.    \ifvoid\footins\else
  68.      \ftn@amount\ht\footins
  69.      \advance\ftn@amount\dp\footins
  70.      \advance\ftn@amount\skip\footins
  71.    \fi
  72.    \global\advance\@colht-\ftn@amount
  73.    \global\@colroom\@colht
  74.    \@xstartcol
  75.    \global\advance\@colht\ftn@amount
  76.    \global\advance\@colroom\ftn@amount
  77.  \if@fcolmade
  78.   \setbox\@cclv\box\@outputbox
  79.   \@makecol
  80.  \else
  81.    \ifvoid\footins\else
  82.      \insert\footins{\unvbox\footins}\fi
  83.  \fi}
  84. \newdimen\ftn@amount
  85. \def\@xstartcol{%
  86.   \@tryfcolumn \@deferlist
  87.   \if@fcolmade
  88.   \else
  89.     \begingroup
  90.       \let \@tempb \@deferlist
  91.       \global \let \@deferlist \@empty
  92.       \let \@elt \@scolelt
  93.       \@tempb
  94.     \endgroup
  95.   \fi
  96. \def\@makecol{\if@firstcolumn
  97.   \setbox\@outputbox\box\@cclv
  98.   \if@twocolumn \else
  99.     \ifvoid\footins \else
  100.       \@latexerr{ftnright package
  101.                  used in one-column mode}%
  102.    {The ftnright package was designed to
  103.     work with LaTeX's standard^^Jtwocolumn
  104.     option. It does *not* work with the
  105.     multicol package.^^JSo please specify
  106.     `twocolum' in the
  107.     \noexpand\documentclass command.}%
  108.       \shipout\box\footins \fi\fi
  109.  \else
  110.   \ifvoid\footins
  111.     \setbox\@outputbox\box\@cclv
  112.   \else
  113.     \setbox\@outputbox\vbox
  114.       {\ifvoid\@cclv \else
  115.          \unvbox\@cclv
  116.          \vskip\skip\footins\fi
  117.        \footnoterule\unvbox\footins}\fi
  118.   \fi
  119.   \xdef\@freelist{\@freelist\@midlist}%
  120.   \global \let \@midlist \@empty
  121.   \@combinefloats
  122.   \ifvbox\@kludgeins
  123.     \@makespecialcolbox
  124.   \else
  125.    \setbox\@outputbox\vbox to\@colht
  126.      {\boxmaxdepth\maxdepth
  127.       \@texttop
  128.       \@tempdima\dp\@outputbox
  129.       \unvbox\@outputbox
  130.       \vskip-\@tempdima
  131.       \@textbottom}%
  132.   \fi
  133.   \global\maxdepth\@maxdepth}
  134. \ifcase \@ptsize
  135. \renewcommand\footnotesize{%
  136.  \@setfontsize\footnotesize\@viiipt{9.9}%
  137.  \abovedisplayskip 6\p@\@plus2\p@\@minus4\p@
  138.  \abovedisplayshortskip \z@ \@plus\p@
  139.  \belowdisplayshortskip
  140.                     3\p@\@plus\p@\@minus2\p@
  141.  \def\@listi{\leftmargin\leftmargini
  142.            \topsep 3\p@ \@plus\p@ \@minus\p@
  143.            \parsep 2\p@ \@plus\p@ \@minus\p@
  144.            \itemsep \parsep}%
  145.  \belowdisplayskip \abovedisplayskip
  146. \renewcommand\footnotesize{%
  147.  \@setfontsize\footnotesize\@ixpt{11.1}%
  148.  \abovedisplayskip 8\p@\@plus2\p@\@minus4\p@
  149.  \abovedisplayshortskip \z@ \@plus\p@
  150.  \belowdisplayshortskip
  151.                  4\p@ \@plus2\p@ \@minus2\p@
  152.  \def\@listi{\leftmargin\leftmargini
  153.           \topsep 4\p@ \@plus2\p@\@minus2\p@
  154.           \parsep 2\p@ \@plus\p@ \@minus\p@
  155.           \itemsep \parsep}%
  156.  \belowdisplayskip \abovedisplayskip
  157. \renewcommand\footnotesize{%
  158.  \@setfontsize\footnotesize\@xpt{12.3}%
  159.  \abovedisplayskip10\p@\@plus2\p@\@minus5\p@
  160.  \abovedisplayshortskip \z@ \@plus3\p@
  161.  \belowdisplayshortskip
  162.                  6\p@ \@plus3\p@ \@minus3\p@
  163.  \def\@listi{\leftmargin\leftmargini
  164.          \topsep 6\p@ \@plus2\p@ \@minus2\p@
  165.          \parsep 3\p@ \@plus2\p@ \@minus\p@
  166.          \itemsep \parsep}%
  167.  \belowdisplayskip \abovedisplayskip
  168. \let\footnoterule\@empty
  169. \AtBeginDocument
  170.   {\global\footnotesep\ht\strutbox}
  171. \long\def\@makefntext#1{\parindent 1em
  172.   \noindent\hbox to 2em{}%
  173.   \llap{$\@thefnmark.\;\;$}#1}
  174. \setlength{\skip\footins}
  175.           {10pt plus 5pt minus 3pt}
  176. \AtBeginDocument{\preparefootins}
  177. \endinput
  178. %% End of file `ftnright.sty'.
  179.